﻿Imports System.Collections.ObjectModel

Public Class FixedTokenVm
    Inherits TokenBaseVm


    Public Sub New(token As Token, obj As RawObjectVm, usage As TokenUsage)
        MyBase.New(token, obj, usage)
    End Sub

    Public Sub New(token As Token, obj As RawObjectVm)
        MyBase.New(token, obj, TokenDictionary.Instance.GetUsage(token.Name, obj.RawObject.TypeCode))
    End Sub

    Public Overrides ReadOnly Property CanAddArguments As Boolean
        Get
            Return False
        End Get
    End Property
End Class
